* net/shr.el (shr-rescale-image): Use ImageMagick even for GIFs

Now that Emacs supports ImageMagick animations.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 2040ebde93f7621c4d30fc8e1c28aedeab512460..bc993c07398872b37a6e7080ea0bfd93d89f3dc6 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2013-08-16  Lars Magne Ingebrigtsen  <larsi@gnus.org>
+
+       * net/shr.el (shr-rescale-image): Use ImageMagick even for GIFs
+       now that Emacs supports ImageMagick animations.
+
 2013-08-16  Michael Albinus  <michael.albinus@gmx.de>
 
        * net/tramp-cmds.el (top): Don't declare `buffer-name'.

diff --git a/lisp/net/shr.el b/lisp/net/shr.el
index 3283712bf0ade296ac7b2b26d99e6aa3e03a30eb..9cac618b159d42bb4edd2964344b57d51156debe 100644 (file)
--- a/lisp/net/shr.el
+++ b/lisp/net/shr.el
@@ -779,7 +779,6 @@ element is the data blob and the second element is the content-type."
   "Rescale DATA, if too big, to fit the current buffer.
 If FORCE, rescale the image anyway."
   (if (or (not (fboundp 'imagemagick-types))
-         (eq (image-type-from-data data) 'gif)
          (not (get-buffer-window (current-buffer))))
       (create-image data nil t :ascent 100)
     (let ((edges (window-inside-pixel-edges